// This company bids for Plumbing only
// Strategy: fixed price


{ include("common.asl") }

!init.
 
+!create_artifacts
   <-  !create_artifact("KITStorageRequestArt", "KITStorageRequestArt", "[]");
   !create_artifact("WorkMemory", "WorkMemoryArt", "[]");
   !create_artifact("KITCredentials", "KITCredentialsArt", "[]");
   !create_artifact("KITAutentication", "KITAutenticationArt", "[]");
   !create_artifact("KITKnowledgeRequest", "KITKnowledgeRequestArt", "[]");
   !create_artifact("KDAuthentication", "KDAuthenticationArt", "[]");
   !create_artifact("KnowledgeRequest", "KnowledgeRequestArt", "[]");
   !create_artifact("KDCredentials", "KDCredentialsArt", "[]").
       
+!create_organisational_artifacts
    <- 
    	// Create the group artifact
		makeArtifact("kmGroup","ora4mas.nopl.GroupBoard",["src/integration-os.xml", kmGroup, false, true ],GrArtId);
		adoptRole(kca)[artifact_id(GrArtId)]; 
		focus(GrArtId);
      
		// Create de scheme artifact
		makeArtifact("kmScheme", "ora4mas.nopl.SchemeBoard",["src/integration-os.xml", store_relevant_information_scheme, false, true], SchArtId);
		focus(SchArtId);
		?formationStatus(ok)[artifact_id(GrArtId)]; // see plan belows to ensure we wait until it is well formed
		addScheme("Scheme")[artifact_id(GrArtId)].
            
+!init
   <- println;
	  .my_name(Me);
      println("--- Knowledge Coordinator Agent ---");
      println(Me);	  
	  println;
      createWorkspace("integrationWorkspace");
      joinWorkspace("integrationWorkspace",_);
      !create_organisational_artifacts;
      !create_artifacts.
      

{ include("org_code.asl") }


      
